100 POKE53280,0:POKE53281,0:POKE53272,23
150 PRINT"[147][158]             [215][200][195] [197]NTERPRISES"
155 GOSUB390:GOSUB340:PRINT"[153]                                        [146]";
160 PRINT"                                        [146]";
162 PRINT"            [197][206][199][204][201][211][200][160][197][216][197][210][195][201][211][197][211]           [146]";
165 PRINT"[153]                                        [146]";:GOSUB390:GOSUB340
170 PRINT"                                        [146]";
175 PRINT"         *  [211]PELLZZZZZZ[218]APPER  *        [146]";
180 PRINT"[153]                                        [146]";:GOSUB390:GOSUB340
182 PRINT"              [208]RACTICE - 4              [146]";
184 PRINT"[153]                                        [146]";
186 PRINT"                                        [146]":GOSUB391
188 PRINT"                                      [152][212][153]"
190 GOSUB290
195 GOTO500
200 REM CORRECT
202 GOSUB300
204 PRINT"[153]               [195][207][210][210][197][195][212]!                 [146]"
206 GOSUB392:RETURN
210 REM WRONG
212 GOSUB320
214 PRINT"[150]           [206][207]!!   [212]RY AGAIN!            [146]":GOSUB392
216 PRINT"[145][145]                                        [145][145]
218 [153]"ONONON                                        ONONON":[142]
290 [141]392:[141]360
292 [153]"CONT      (null)RESS (null)(null)ATNLENVALCLOSEPEEKATN(null) TO CONTINUE       WAIT"
294 [161]R$:[139]R$[179][177][199](32)[175]R$[179][177]"T"[167]294
296 [139]R$[178]"T"[167][141]900
298 [153]"LOAD":[141]390:[142]
299 :
300 [143] <YES> SOUND
302 S[178]54272:[129]E[178]S[164]S[170]28:[151]E,0:[130]
304 [151]54296,15:[151]54277,42:[151]54278,250
306 [151]54276,23:[151]54273,23:[151]54272,191
308 [129]T[178]1[164]200:[130]:[151]54276,32:[129]T[178]1[164]250:[130]
310 [151]54296,0:[142]
320 [143] <NO> SOUND
322 S[178]54272:[129]E[178]S[164]S[170]28:[151]E,0:[130]
324 [151]54296,15:[151]54277,18:[151]54278,242
326 [151]54276,33:[151]54273,4:[151]54272,48
328 [129]T[178]1[164]300:[130]:[151]54276,32:[129]T[178]1[164]400:[130]
330 [151]54296,0:[142]
340 [143] <BLIP> SOUND
342 S[178]54272:[129]E[178]S[164]S[170]28:[151]E,0:[130]
344 [151]54296,7:[151]54277,42:[151]54278,250
346 [151]54276,23:[151]54273,23:[151]54272,191
348 [129]T[178]1[164]35:[130]:[151]54276,32:[129]T[178]1[164]50:[130]
350 [151]54296,0:[142]
360 [143] <DING> SOUND
362 S[178]54272:[151]54296,15:[151]S,50:[151]S[170]1,35:[151]S[170]2,0:[151]S[170]3,8:[151]S[170]5,0
364 [151]S[170]6,10[172]16[170]9:[151]S[170]4,14:[151]S[170]4,65:[129]Q[178]1[164]20:[151]S[170]4,64:[142]
370 [143] <VERY WRONG SOUND>
372 S[178]54272:[151]54296,15:[151]S,32:[151]S[170]1,3:[151]S[170]2,128:[151]S[170]3,13
374 [151]S[170]5,4[172]16[170]0:[151]S[170]6,10[172]16[170]8
376 [151]S[170]24,15:[151]S[170]4,65:[129]Q[178]1[164]500:[130]:[151]S[170]4,64:[142]
390 [129]T[178]1[164]600:[130]:[142]
391 [129]T[178]1[164]1000:[130]:[142]
392 [129]T[178]1[164]2000:[130]:[142]
393 [129]T[178]1[164]3000:[130]:[142]
394 [129]T[178]1[164]4000:[130]:[142]
395 [129]T[178]1[164]5000:[130]:[142]
399 :
400 [153]"LISTLOAD (null)PELLINGZZZ(null)APPER (null)-4        RIGHT$TEM "N
410 [142]
500 [153]"LOAD  (null)OW YOU CAN LEN(null)(null)(null)LENLEFT$ THOSE NASTY
502 PRINT"  FREQUENTLY MISSPELLED WORDS!
504 [153]"OPEN  (null)HIS IS ONE OF A SERIES OF GAMES
508 PRINT"  DESIGNED TO HELP YOU MASTER THE
512 [153]"  CORRECT SPELLING OF SOME OF THE
516 PRINT"  REALLY TRICKY WORDS IN THE [197]NGLISH
520 [153]"  LANGUAGE.
524 PRINT"  [201] WILL SHOW YOU TWO WORDS.  [207]NE OF
528 [153]"  THESE WILL BE SPELLED CORRECTLY.
532 PRINT"  [217]OUR TASK IS TO SELECT AND TYPE
536 [153]"  THE CORRECTLY SPELLED WORD.
540 PRINT"  [217]OU WILL HAVE TWO CHANCES TO SPELL
544 [153]"  A WORD CORRECTLY; THEN THAT WORD
548 PRINT"  WILL BE DISPLAYED.
552 [153]"  (null)LEASE RECORD ANY WORDS THAT YOU
556 PRINT"  FUMBLE.[145]"
560 GOSUB290
590 PRINT"AND AWAY WE GO..........":GOSUB300:GOSUB391
600 N=1
610 FORG=1TO20:FORI=1TO3:K=0:GOSUB400:N=N+1
620 READA$,B$,C$
630 PRINT"[159] [215]HICH OF THESE WORDS IS SPELLED         CORRECTLY?
640 [153]"SYS >>> "A$;B$
650 [153]"SYS ":[133]Z$
660 [139]Z$[178]C$[167][141]200:[137]690
670 [139]K[178]1[167][141]370:[153]"DEF (null)HE CORRECT SPELLING IS "C$"DEF."
675 [139]K[178]1[167] [141]290:W[178]W[170]1:[137]690
680 K[178]K[170]1:P[178]P[170]1:[141]210:[137]650
690 [130]G
699 :
700 [153]"LOAD  (null)PELLINGZZZZAPPER (null)-4    (null)LEN(null)(null)VALCLOSEPEEK(null)ATN(null)STR$  WAIT
705 L=P-W:C=20-P
710 PRINT"   [158] [195]ORRECT ON FIRST ATTEMPT....."C:GOSUB300:GOSUB391
715 PRINT"   [159] [195]ORRECT ON SECOND ATTEMPT...."L:GOSUB320:GOSUB391
720 PRINT"   [150] [194][204][207][207][208][197][210][211]....................."W:GOSUB370:GOSUB391:PRINT""
725 IF C=20THENPRINT"[145][145][158]                [197][216][195][197][204][204][197][206][212]!              [146]"
730 GOSUB290
750 PRINT"[147][158] [217]OU HAVE A CHOICE:
755 [153]" (null)RESS  (null) WAIT TO REPEAT (null)RACTICE (null)-4
760 PRINT" [208]RESS  [205] [146] TO GO TO THE DISK MENU
765 [161]R$:[139]R$[179][177]"R"[175]R$[179][177]"(null)"[175]R$[179][177]"M"[175]R$[179][177]"(null)"[167]765
770 [139] R$[178]"R"[167] [140]:[137]100
772 [139] R$[178]"(null)"[167] [140]:[137]100
775 [153]"LOADSYS (null)ETURNING TO THE DISK MENU.
780 LOAD"MENU",8
785 RUN
790 END
799 :
899 :
900 PRINT"[147]   [200]ERE ARE THE WORDS USED IN [211]PELL        [208]RACTICE 4
905 [153]"OPEN   CATEGORY         INDISPENSABLE
910 PRINT"   PERMIT           STRENGTH
915 [153]"   COMPARATIVE      INTERESTING
920 PRINT"   PERSEVERANCE     SUPERINTENDENT
925 [153]"   COMPETENT        LABORATORY
930 PRINT"   PRIMITIVE        SURPRISE
935 [153]"   DEFINITE         LENGTH
940 PRINT"   PRIVILEGE        USUALLY
945 [153]"   ENVIRONMENT      LIBRARY
950 PRINT"   RESTAURANT       [215]EDNESDAY
960 [141]290:[142]
999 :
1000 [131]"CATEGORY /"," CATAGORY","CATEGORY"
1010 [131]"INDISPENSABLE /"," INDESPENSIBLE","INDISPENSIBLE"
1020 [131]"PERMIT /"," PERMET","PERMIT"
1030 [131]"STRENTH /"," STRENGTH","STRENGTH"
1040 [131]"COMPARATIVE /"," COMPARETIVE","COMPARATIVE"
1050 [131]"INTIRESTING /"," INTERESTING","INTERESTING"
1060 [131]"PERSAVERANCE /"," PERSEVERANCE","PERSEVERANCE"
1070 [131]"SUPERENTENDENT /"," SUPERINTENDENT","SUPERINTENDENT"
1080 [131]"COMPETENT /"," COMPETANT","COMPETENT"
1090 [131]"LABORATORY /"," LABRATORY","LABORATORY"
1100 [131]"PRIMITIVE /"," PRIMATIVE","PRIMITIVE"
1110 [131]"SUPRISE /"," SURPRISE","SURPRISE"
1120 [131]"DEFINITE /"," DEFENITE","DEFINITE"
1130 [131]"LENTH /"," LENGTH","LENGTH"
1140 [131]"PRIVILEGE /"," PRIVALEGE","PRIVILEGE"
1150 [131]"USUALLY /"," USEULLY","USUALLY"
1160 [131]"ENVIRENMENT /"," ENVIRONMENT","ENVIRONMENT"
1170 [131]"LIBRARY /"," LIBERARY","LIBRARY"
1180 [131]"RESTRAUNT /"," RESTAURANT ","RESTAURANT"
1190 [131]"(null)EDNESDAY /"," (null)ENESDAYR","(null)EDNESDAY"
2000 [143] WHC 92:09:22